home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Over 1,000 Windows 95 Programs
/
Over 1000 Windows 95 Programs (Microforum) (Disc 1).iso
/
0159
/
delphi.zip
/
UNIT1.DFM
/
UNIT1.txt
Wrap
Text File
|
1996-01-15
|
6KB
|
177 lines
object Form1: TForm1
Left = 285
Top = 206
BorderStyle = bsSingle
Caption = 'Selector Example'
ClientHeight = 276
ClientWidth = 488
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
Menu = MainMenu1
PixelsPerInch = 96
TextHeight = 16
object Label1: TLabel
Left = 88
Top = 256
Width = 313
Height = 16
Caption = 'Sample using Selector Control in Borland Delphi'
Color = clMenu
ParentColor = False
end
object Selector1: TSelector
Left = 8
Top = 8
Width = 233
Height = 241
TabOrder = 0
TabStop = True
BorderType = 1
BevelWidth = 4
BevelInner = 2
BevelOuter = 1
BorderWidth = 4
OutlineColor = clBlack
OutlineWidth = 0
OutlineAlign = 0
FrameStyle = 0
FrameColor = clBlack
BackgroundColor = clSilver
MouseControl = True
AutoAlign = False
AutoAngle = False
AutoOffset = False
AutoOffsetStyle = 1
AutoOffsetDistance = 0.550000011920929000
AutoStartAngle = 30.000000000000000000
AutoStopAngle = 330.000000000000000000
AutoRadius = 0.800000011920929000
LineDisplay = True
LineInnerRadius = 0.400000005960464500
LineThickness = 1
KnobStyle = 1
KnobRadius = 0.300000011920929000
KnobColor = clBlack
Value = 9
Highlight = True
HighlightColor = clGreen
FontID = 0
AutoAngleConfine = False
AVersion = 0
ZLoad = {
00000C000200FFFFFF00CDCCCC3E0000803E0000803F000000002031204D487A
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000AF99193E000000009A99593F000000000000
F0410000203130204D487A000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000B7E8FBBD00000000
CDCC4C3F0000000046176542000020313030204D487A00000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00005E4A7CBE00000000CDCC4C3F000000004617A942000020312047487A0000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000CB5145BE00000000CDCC4C3F00000000E9A2DF42
00002031302047487A0000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000012E5D53C00000000CDCC
4C3F0000000046170B430000203130302047487A000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
3A08B93E000000009A99593F00000000175D264300003120487A200000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000100C508B9BE000000009A99593F00000000E9A241430000
313020487A200000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000100CDEBD5BC00000000CDCC4C3F
00000000BAE85C43000031303020487A20000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000001006451
453E00000000CDCC4C3F000000008C2E7843000031204B487A20000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000100784A7C3E00000000CDCC4C3F000000002FBA894300003130
204B487A20000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000100F3E9FB3D00000000CDCC4C3F0000
0000175D97430000313030204B487A2000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000100B89819BE
000000009A99593F000000000000A54300000100F3FF00000000000090010000
00010000000053797374656D00204E65770066006E0020001100000000009001
000053796D62}
Angle = 1133099567
XScale = 0
YScale = 0
Radius = 0
end
object Selector2: TSelector
Left = 248
Top = 8
Width = 233
Height = 241
TabOrder = 1
TabStop = True
BorderType = 1
BevelWidth = 2
BevelInner = 1
BevelOuter = 0
BorderWidth = 2
OutlineColor = clBlack
OutlineWidth = 0
OutlineAlign = 0
FrameStyle = 0
FrameColor = clBlack
BackgroundColor = clSilver
MouseControl = True
AutoAlign = True
AutoAngle = True
AutoOffset = True
AutoOffsetStyle = 1
AutoOffsetDistance = 1.000000000000000000
AutoStartAngle = 30.000000000000000000
AutoStopAngle = 150.000000000000000000
AutoRadius = 0.800000011920929000
LineDisplay = True
LineInnerRadius = 0.400000005960464500
LineThickness = 1
KnobStyle = 2
KnobRadius = 0.349999994039535500
KnobOriginX = -0.899999976158142100
KnobColor = clPurple
Value = 0
Highlight = False
HighlightColor = clBlack
FontID = 3
AutoAngleConfine = True
OnChange = Selector2Change
AVersion = 0
ZLoad = {
0100040000000000000000000000000000000000000000000000466F6E742053
656C6563746F7200000000000000000000000000000000000000000000000000
00000000000000000000000000000000CDCC8C3FFF00000000004D532053616E
7320536572696600000000000000000000000000000000000000000000000000
00000000000000000000000000009F99193F00000000CDCC4C3F000000000000
F0410000436F7572696572204E65770000000000000000000000000000000000
0000000000000000000000000000000000000000000000003F347E3E00000000
CDCC4C3F0000000000008C420100417269616C00000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000E347E3E00000000CDCC4C3F000000000000DC42020054696D6573204E65
7720526F6D616E00000000000000000000000000000000000000000000000000
0000000000000000000000008099193F00000000CDCC4C3F0000000000001643
03000400F3FF000000000000BC0200000000010201224D532053616E73205365
726966006E0020001100000000009001000053796D62F3FF000000000000BC02
0000000003020131436F7572696572204E65770066006E002000110000000000
9001000053796D62EDFF000000000000BC02FF00000003020122417269616C00
72204E65770066006E0020001100000000009001000053796D62F3FF00000000
00009001000000010000000053797374656D00204E65770066006E0020001100
000000009001000053796D62}
Angle = 1106247680
XScale = 0
YScale = 0
Radius = 0
end
object MainMenu1: TMainMenu
Top = 248
object File1: TMenuItem
Caption = '&File'
object Exit1: TMenuItem
Caption = 'E&xit'
OnClick = Exit1Click
end
end
end
end